with Ada.Assertions; use Ada.Assertions;

--
-- Tests for WGetter Package
--

package body Test_WGetter is

   --
   -- tests suite
   --
   --    run all tests
   --

   procedure Tests_Suite is

   begin

      Test_WGetter_Active_Object;

   end Tests_Suite;


   --
   -- simple test for WGetter package
   --

   procedure Test_WGetter_Active_Object is

   begin

      WGet_Pkg.WGet( Website => "http://med.mercer.edu/musmdocs/index.html",
                     File_Name => "old_mail_instructions.html" );

   end Test_WGetter_Active_Object;


end Test_WGetter;